﻿Namespace Solution

    Public Class ProjectVO
        Inherits BaseVO

        Private _projectId As Integer
        Private _solutionId As Integer
        Private _name As String
        Private _description As String
        Private _lastUpdate As Date
        Private _deleted As Boolean

        Sub New()
        End Sub

        Sub New(entity As Data.BaseModel.Project)
            If entity IsNot Nothing Then
                projectId = entity.ProjectId
                solutionId = entity.SolutionId
                name = entity.Name
                description = entity.Description
                lastUpdate = entity.LastUpdate
                deleted = entity.Deleted
            End If
        End Sub

        Public Property projectId As Integer
            Get
                Return _projectId
            End Get
            Set(value As Integer)
                _projectId = value
            End Set
        End Property
        Public Property solutionId As Integer
            Get
                Return _solutionId
            End Get
            Set(value As Integer)
                _solutionId = value
            End Set
        End Property
        <RequiredAtt("name")> _
        Public Property name As String
            Get
                Return _name
            End Get
            Set(value As String)
                _name = value
            End Set
        End Property
        Public Property description As String
            Get
                Return _description
            End Get
            Set(value As String)
                _description = value
            End Set
        End Property
        Public Property lastUpdate As Date
            Get
                Return _lastUpdate
            End Get
            Set(value As Date)
                _lastUpdate = value
            End Set
        End Property
        Public Property deleted As Boolean
            Get
                Return _deleted
            End Get
            Set(ByVal value As Boolean)
                _deleted = value
            End Set
        End Property

    End Class

End Namespace